geom_line() +
geom_line(data = subset(figure_data_turnarounds, aut_ep_turnaround_outcome == "J-shaped turnaround"),
aes(color = "J-shaped turnaround")) +
geom_line(data = subset(figure_data_turnarounds, aut_ep_turnaround_outcome == "U-shaped turnaround"),
aes(color = "U-shaped turnaround")) +
geom_line(data = subset(figure_data_turnarounds, aut_ep_turnaround_outcome == "L-shaped turnaround"),
aes(color = "L-shaped turnaround")) +
geom_ribbon(aes(ymin = v2x_polyarchy_codelow, ymax = v2x_polyarchy_codehigh), alpha = 0.2) +
geom_line(aes(y= ResCap), linetype = "dashed", color = "grey20") +
geom_ribbon(aes(ymin = ResCap_codelow, ymax = ResCap_codehigh), fill = "grey20", alpha = 0.2) +
facet_wrap(~country_name) +
labs(color = "",
y = "Electoral Democracy Index/ \nDemocratic Resilience Capacity") +
theme(axis.text.x = element_text(size=14, angle=45)) +
scale_color_manual(values = c("J-shaped turnaround" = "#00AFBB", "U-shaped turnaround" = "#E7B800", "L-shaped turnaround" = "#FC4E07")) +
theme(legend.position="bottom") +
theme_pubr()
ggplot(figure_data_turnarounds, aes(x= year, y = v2x_polyarchy)) +
geom_line() +
geom_line(data = subset(figure_data_turnarounds, aut_ep_turnaround_outcome == "J-shaped turnaround"),
aes(color = "J-shaped turnaround")) +
geom_line(data = subset(figure_data_turnarounds, aut_ep_turnaround_outcome == "U-shaped turnaround"),
aes(color = "U-shaped turnaround")) +
geom_line(data = subset(figure_data_turnarounds, aut_ep_turnaround_outcome == "L-shaped turnaround"),
aes(color = "L-shaped turnaround")) +
geom_ribbon(aes(ymin = v2x_polyarchy_codelow, ymax = v2x_polyarchy_codehigh), alpha = 0.2) +
geom_line(aes(y= ResCap), linetype = "dashed", color = "grey20") +
geom_ribbon(aes(ymin = ResCap_codelow, ymax = ResCap_codehigh), fill = "grey20", alpha = 0.2) +
facet_wrap(~country_name) +
labs(color = "",
y = "Electoral Democracy Index/ \nDemocratic Resilience Capacity") +
theme_pubr() +
theme(axis.text.x = element_text(size=14, angle=45)) +
scale_color_manual(values = c("J-shaped turnaround" = "#00AFBB", "U-shaped turnaround" = "#E7B800", "L-shaped turnaround" = "#FC4E07")) +
theme(legend.position="bottom")
ggplot(figure_data_turnarounds, aes(x= year, y = v2x_polyarchy)) +
geom_line() +
geom_line(data = subset(figure_data_turnarounds, aut_ep_turnaround_outcome == "J-shaped turnaround"),
aes(color = "J-shaped turnaround")) +
geom_line(data = subset(figure_data_turnarounds, aut_ep_turnaround_outcome == "U-shaped turnaround"),
aes(color = "U-shaped turnaround")) +
geom_line(data = subset(figure_data_turnarounds, aut_ep_turnaround_outcome == "L-shaped turnaround"),
aes(color = "L-shaped turnaround")) +
geom_ribbon(aes(ymin = v2x_polyarchy_codelow, ymax = v2x_polyarchy_codehigh), alpha = 0.2) +
geom_line(aes(y= ResCap), linetype = "dashed", color = "grey20") +
geom_ribbon(aes(ymin = ResCap_codelow, ymax = ResCap_codehigh), fill = "grey20", alpha = 0.2) +
facet_wrap(~country_name) +
labs(color = "",
y = "Electoral Democracy Index/ \nDemocratic Resilience Capacity") +
theme_pubr() +
theme(axis.text.x = element_text(size=12, angle=45)) +
